descrizione gestione proprietà
con VBA
esci con vbasintassi.htm
xscrollbars.ppt
descrizione di proprietà applicate a textbox1
(variante di scrollbars.ppt)
autosize-multiline-wordwrap-scrollbars
per ogni esempio consultare il codice fornito a destra
in corrispondenza
dei pulsanti CB cliccati
Private Sub CommandButton1_Click()
Rem inizializza proprietà
TextBox1.Left = 40
TextBox1.Top = 20
TextBox1.Height = 50
TextBox1.Width = 200
TextBox1.AutoSize = False
TextBox1.WordWrap = False
TextBox1.ScrollBars = 0
TextBox1.MultiLine = False
TextBox1.Text = "scrivi testo "
End Sub
Private Sub CommandButton2_Click()
TextBox1.Text = "scrivi testo "
TextBox1.AutoSize = False
TextBox1.WordWrap = False
TextBox1.ScrollBars = 1
TextBox1.MultiLine = True
End Sub
Private Sub CommandButton3_Click()
TextBox1.Text = "scrivi testo"
TextBox1.AutoSize = False
TextBox1.WordWrap = False
TextBox1.ScrollBars = 2
TextBox1.MultiLine = True
End Sub
Private Sub CommandButton4_Click()
TextBox1.Text = "testo "
TextBox1.AutoSize = False
TextBox1.WordWrap = False
TextBox1.ScrollBars = 3
TextBox1.MultiLine = True
End Sub
Private Sub CommandButton5_Click()
TextBox1.Text = "scrivi testo"
TextBox1.AutoSize = True
TextBox1.WordWrap = True
TextBox1.ScrollBars = 3
TextBox1.MultiLine = True
End Sub
Private Sub CommandButton6_Click()
TextBox1.Text = "scrivi testo "
TextBox1.AutoSize = True
TextBox1.WordWrap = False
TextBox1.ScrollBars = 3
TextBox1.MultiLine = False
End Sub
Private Sub CommandButton7_Click()
TextBox1.Text = "scrivi testo "
TextBox1.AutoSize = True
TextBox1.WordWrap = False
TextBox1.ScrollBars = 3
TextBox1.MultiLine = True
End Sub
Private Sub CommandButton8_Click()
TextBox1.Text = "scrivi testo "
TextBox1.AutoSize = True
TextBox1.WordWrap = True
TextBox1.ScrollBars = 3
TextBox1.MultiLine = False
End Sub
Private Sub CommandButton9_Click()
Label6.Visible = True
End Sub
Private Sub CommandButton10_Click()
Label6.Visible = False
End Sub
Private Sub UserForm_Click()
End Sub